(bookmark-get-bookmark): Use assoc-string.

diff --git a/lisp/bookmark.el b/lisp/bookmark.el
index 762de7323a28da3bcd0759647520b4df5762056e..67ae2c848659484dbb938b46ce421b9e3b282134 100644 (file)
--- a/lisp/bookmark.el
+++ b/lisp/bookmark.el
@@ -335,10 +335,7 @@ through a file easier.")
   "Return the full entry for BOOKMARK in bookmark-alist.
 If BOOKMARK is not a string, return nil."
   (when (stringp bookmark)
-    (apply (if bookmark-completion-ignore-case
-              #'assoc-ignore-case
-            #'assoc)
-          (list bookmark bookmark-alist))))
+    (assoc-string bookmark bookmark-alist bookmark-completion-ignore-case)))
 
 
 (defun bookmark-get-bookmark-record (bookmark)